3.61 \(\int (A+B \log (e (\frac{a+b x}{c+d x})^n)) \, dx\)

Optimal. Leaf size=56 \[ \frac{B (a+b x) \log \left (e \left (\frac{a+b x}{c+d x}\right )^n\right )}{b}-\frac{B n (b c-a d) \log (c+d x)}{b d}+A x \]

[Out]

A*x + (B*(a + b*x)*Log[e*((a + b*x)/(c + d*x))^n])/b - (B*(b*c - a*d)*n*Log[c + d*x])/(b*d)

________________________________________________________________________________________

Rubi [A]  time = 0.0327508, antiderivative size = 56, normalized size of antiderivative = 1., number of steps used = 3, number of rules used = 2, integrand size = 22, \(\frac{\text{number of rules}}{\text{integrand size}}\) = 0.091, Rules used = {2486, 31} \[ \frac{B (a+b x) \log \left (e \left (\frac{a+b x}{c+d x}\right )^n\right )}{b}-\frac{B n (b c-a d) \log (c+d x)}{b d}+A x \]

Antiderivative was successfully verified.

[In]

Int[A + B*Log[e*((a + b*x)/(c + d*x))^n],x]

[Out]

A*x + (B*(a + b*x)*Log[e*((a + b*x)/(c + d*x))^n])/b - (B*(b*c - a*d)*n*Log[c + d*x])/(b*d)

Rule 2486

Int[Log[(e_.)*((f_.)*((a_.) + (b_.)*(x_))^(p_.)*((c_.) + (d_.)*(x_))^(q_.))^(r_.)]^(s_.), x_Symbol] :> Simp[((
a + b*x)*Log[e*(f*(a + b*x)^p*(c + d*x)^q)^r]^s)/b, x] + Dist[(q*r*s*(b*c - a*d))/b, Int[Log[e*(f*(a + b*x)^p*
(c + d*x)^q)^r]^(s - 1)/(c + d*x), x], x] /; FreeQ[{a, b, c, d, e, f, p, q, r, s}, x] && NeQ[b*c - a*d, 0] &&
EqQ[p + q, 0] && IGtQ[s, 0]

Rule 31

Int[((a_) + (b_.)*(x_))^(-1), x_Symbol] :> Simp[Log[RemoveContent[a + b*x, x]]/b, x] /; FreeQ[{a, b}, x]

Rubi steps

\begin{align*} \int \left (A+B \log \left (e \left (\frac{a+b x}{c+d x}\right )^n\right )\right ) \, dx &=A x+B \int \log \left (e \left (\frac{a+b x}{c+d x}\right )^n\right ) \, dx\\ &=A x+\frac{B (a+b x) \log \left (e \left (\frac{a+b x}{c+d x}\right )^n\right )}{b}-\frac{(B (b c-a d) n) \int \frac{1}{c+d x} \, dx}{b}\\ &=A x+\frac{B (a+b x) \log \left (e \left (\frac{a+b x}{c+d x}\right )^n\right )}{b}-\frac{B (b c-a d) n \log (c+d x)}{b d}\\ \end{align*}

Mathematica [A]  time = 0.0090986, size = 56, normalized size = 1. \[ \frac{B (a+b x) \log \left (e \left (\frac{a+b x}{c+d x}\right )^n\right )}{b}-\frac{B n (b c-a d) \log (c+d x)}{b d}+A x \]

Antiderivative was successfully verified.

[In]

Integrate[A + B*Log[e*((a + b*x)/(c + d*x))^n],x]

[Out]

A*x + (B*(a + b*x)*Log[e*((a + b*x)/(c + d*x))^n])/b - (B*(b*c - a*d)*n*Log[c + d*x])/(b*d)

________________________________________________________________________________________

Maple [B]  time = 0.049, size = 122, normalized size = 2.2 \begin{align*} Ax+B\ln \left ( e \left ({\frac{bx+a}{dx+c}} \right ) ^{n} \right ) x+{\frac{Bn{a}^{2}\ln \left ( bx+a \right ) d}{b \left ( ad-bc \right ) }}-{\frac{Bna\ln \left ( bx+a \right ) c}{ad-bc}}-{\frac{Bnc\ln \left ( dx+c \right ) a}{ad-bc}}+{\frac{Bn{c}^{2}\ln \left ( dx+c \right ) b}{d \left ( ad-bc \right ) }} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(A+B*ln(e*((b*x+a)/(d*x+c))^n),x)

[Out]

A*x+B*ln(e*((b*x+a)/(d*x+c))^n)*x+B*n*a^2/(a*d-b*c)/b*ln(b*x+a)*d-B*n*a/(a*d-b*c)*ln(b*x+a)*c-B*n*c/(a*d-b*c)*
ln(d*x+c)*a+B*n*c^2/(a*d-b*c)/d*ln(d*x+c)*b

________________________________________________________________________________________

Maxima [A]  time = 1.17749, size = 70, normalized size = 1.25 \begin{align*} B n{\left (\frac{a \log \left (b x + a\right )}{b} - \frac{c \log \left (d x + c\right )}{d}\right )} + B x \log \left (e \left (\frac{b x + a}{d x + c}\right )^{n}\right ) + A x \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(A+B*log(e*((b*x+a)/(d*x+c))^n),x, algorithm="maxima")

[Out]

B*n*(a*log(b*x + a)/b - c*log(d*x + c)/d) + B*x*log(e*((b*x + a)/(d*x + c))^n) + A*x

________________________________________________________________________________________

Fricas [A]  time = 0.841066, size = 158, normalized size = 2.82 \begin{align*} \frac{B b d n x \log \left (\frac{b x + a}{d x + c}\right ) + B a d n \log \left (b x + a\right ) - B b c n \log \left (d x + c\right ) + B b d x \log \left (e\right ) + A b d x}{b d} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(A+B*log(e*((b*x+a)/(d*x+c))^n),x, algorithm="fricas")

[Out]

(B*b*d*n*x*log((b*x + a)/(d*x + c)) + B*a*d*n*log(b*x + a) - B*b*c*n*log(d*x + c) + B*b*d*x*log(e) + A*b*d*x)/
(b*d)

________________________________________________________________________________________

Sympy [F(-1)]  time = 0., size = 0, normalized size = 0. \begin{align*} \text{Timed out} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(A+B*ln(e*((b*x+a)/(d*x+c))**n),x)

[Out]

Timed out

________________________________________________________________________________________

Giac [A]  time = 1.39047, size = 72, normalized size = 1.29 \begin{align*}{\left (n x \log \left (\frac{b x + a}{d x + c}\right ) + \frac{a n \log \left (b x + a\right )}{b} - \frac{c n \log \left (-d x - c\right )}{d} + x\right )} B + A x \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(A+B*log(e*((b*x+a)/(d*x+c))^n),x, algorithm="giac")

[Out]

(n*x*log((b*x + a)/(d*x + c)) + a*n*log(b*x + a)/b - c*n*log(-d*x - c)/d + x)*B + A*x